home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…rary 5 (Internal Edition) / Apple R&P Lib Internal v5.0.iso / 6-Developer Demos / Developer Demos-Ed. / Macintosh School® CD-ROM Demo / Macintosh SchoolÆ CD-ROM Demo / card_122097.txt < prev    next >
Text File  |  1990-08-14  |  4KB  |  256 lines
  1. -- card: 122097 from stack: in
  2. -- bmap block id: 124762
  3. -- flags: 4000
  4. -- background id: 14625
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on resetCard
  8.   repeat with index = 4 to 8
  9.     put empty into card field id index
  10.   end repeat
  11.   repeat with index = 1 to 6
  12.     put "Can Take" into line index of card field "Status"
  13.   end repeat
  14. end resetCard
  15.  
  16.  
  17. -- part 1 (button)
  18. -- low flags: 00
  19. -- high flags: 0000
  20. -- rect: left=0 top=0 right=342 bottom=512
  21. -- title width / last selected line: 0
  22. -- icon id / first selected line: 0 / 0
  23. -- text alignment: 1
  24. -- font id: 0
  25. -- text size: 12
  26. -- style flags: 0
  27. -- line height: 16
  28. -- part name: 
  29.  
  30.  
  31. -- part 9 (field)
  32. -- low flags: 01
  33. -- high flags: 0000
  34. -- rect: left=20 top=77 right=150 bottom=75
  35. -- title width / last selected line: 0
  36. -- icon id / first selected line: 0 / 0
  37. -- text alignment: 0
  38. -- font id: 3
  39. -- text size: 9
  40. -- style flags: 0
  41. -- line height: 12
  42. -- part name: Status
  43.  
  44.  
  45. -- part 2 (button)
  46. -- low flags: 00
  47. -- high flags: 0000
  48. -- rect: left=11 top=33 right=48 bottom=26
  49. -- title width / last selected line: 0
  50. -- icon id / first selected line: 5068 / 5068
  51. -- text alignment: 1
  52. -- font id: 0
  53. -- text size: 12
  54. -- style flags: 0
  55. -- line height: 16
  56. -- part name: Close
  57. ----- HyperTalk script -----
  58. on mouseDown
  59.   set icon of me to "Close Box Hi"
  60. end mouseDown
  61.  
  62. on mouseLeave
  63.   set icon of me to "Close Box"
  64. end mouseLeave
  65.  
  66. on mouseUp
  67.   set icon of me to "Close Box"
  68.   lock screen
  69.   resetCard
  70.   pop card
  71.   unlock screen
  72. end mouseUp
  73.  
  74.  
  75. -- part 3 (button)
  76. -- low flags: 00
  77. -- high flags: 4000
  78. -- rect: left=20 top=78 right=90 bottom=464
  79. -- title width / last selected line: 0
  80. -- icon id / first selected line: 0 / 0
  81. -- text alignment: 1
  82. -- font id: 0
  83. -- text size: 12
  84. -- style flags: 0
  85. -- line height: 16
  86. -- part name: 
  87. ----- HyperTalk script -----
  88. on mouseUp
  89.   lock screen
  90.   repeat with index = 4 to 8
  91.     put "French 11 (1)" into card field id index
  92.     put "Taken" into line 1 of card field "Status"
  93.     put "Section 1" into line 2 of card field "Status"
  94.   end repeat
  95.   unlock screen
  96. end mouseUp
  97.  
  98.  
  99.  
  100. -- part 4 (field)
  101. -- low flags: 01
  102. -- high flags: 0000
  103. -- rect: left=42 top=243 right=255 bottom=120
  104. -- title width / last selected line: 0
  105. -- icon id / first selected line: 0 / 0
  106. -- text alignment: 0
  107. -- font id: 3
  108. -- text size: 9
  109. -- style flags: 0
  110. -- line height: 12
  111. -- part name: 
  112.  
  113.  
  114. -- part 5 (field)
  115. -- low flags: 01
  116. -- high flags: 0000
  117. -- rect: left=128 top=243 right=255 bottom=206
  118. -- title width / last selected line: 0
  119. -- icon id / first selected line: 0 / 0
  120. -- text alignment: 0
  121. -- font id: 3
  122. -- text size: 9
  123. -- style flags: 0
  124. -- line height: 12
  125. -- part name: 
  126.  
  127.  
  128. -- part 6 (field)
  129. -- low flags: 01
  130. -- high flags: 0000
  131. -- rect: left=214 top=243 right=255 bottom=292
  132. -- title width / last selected line: 0
  133. -- icon id / first selected line: 0 / 0
  134. -- text alignment: 0
  135. -- font id: 3
  136. -- text size: 9
  137. -- style flags: 0
  138. -- line height: 12
  139. -- part name: 
  140.  
  141.  
  142. -- part 7 (field)
  143. -- low flags: 01
  144. -- high flags: 0000
  145. -- rect: left=300 top=243 right=255 bottom=378
  146. -- title width / last selected line: 0
  147. -- icon id / first selected line: 0 / 0
  148. -- text alignment: 0
  149. -- font id: 3
  150. -- text size: 9
  151. -- style flags: 0
  152. -- line height: 12
  153. -- part name: 
  154.  
  155.  
  156. -- part 8 (field)
  157. -- low flags: 01
  158. -- high flags: 0000
  159. -- rect: left=386 top=243 right=255 bottom=464
  160. -- title width / last selected line: 0
  161. -- icon id / first selected line: 0 / 0
  162. -- text alignment: 0
  163. -- font id: 3
  164. -- text size: 9
  165. -- style flags: 0
  166. -- line height: 12
  167. -- part name: 
  168.  
  169.  
  170. -- part contents for background part 19
  171. ----- text -----
  172. 12
  173. 12
  174. 12
  175. 12
  176. 12
  177. 11
  178. 12
  179. 12
  180.  
  181. -- part contents for background part 20
  182. ----- text -----
  183. 47
  184. 80
  185. 53
  186. 54
  187. 52
  188. 102
  189. 48
  190. 13
  191.  
  192. -- part contents for background part 21
  193. ----- text -----
  194. Abrosimoff, Michael John
  195. Adams, Bryan
  196. Alexander, Rick
  197.  Alexander, Susan
  198. Allsop, Blair M.
  199. Azimov, Isaac
  200.  Barisoff, Larissa
  201. Bunyan, Paul
  202.  
  203.  
  204.  
  205. -- part contents for background part 22
  206. ----- text -----
  207. Industrial
  208. Academic
  209. Academic
  210. Academic
  211. Academic
  212. Academic
  213. Academic
  214. Commercial
  215.  
  216. -- part contents for background part 23
  217. ----- text -----
  218. 0.0
  219. 0.0
  220. 0.0
  221. 0.0
  222. 0.0
  223. 0.0
  224. 0.0
  225. 0.0
  226.  
  227. -- part contents for background part 24
  228. ----- text -----
  229. 0.0
  230. 0.0
  231. 0.0
  232. 0.0
  233. 0.0
  234. 0.0
  235. 0.0
  236. 0.0
  237.  
  238. -- part contents for background part 25
  239. ----- text -----
  240. 12.0
  241. 12.0
  242. 12.0
  243. 12.0
  244. 12.0
  245. 12.0
  246. 12.0
  247. 12.0
  248.  
  249. -- part contents for card part 9
  250. ----- text -----
  251. Can Take
  252. Can Take
  253. Can Take
  254. Can Take
  255. Can Take
  256. Can Take